<%
'******************************************************************************************
'#          Openasp CMS software opensource                                               #
'******************************************************************************************
'#      Copyright (C) Luca Becchetti, Broken Ice Interactive                              #
'#                                                                                        #
'# Questo software è gratuito, è possibile ridistribuire e modificare il prodotto         #
'# rispettando i termini della GNU General Public License pubblicata dalla Free           #
'# Software Foundation, si fa riferimento alla versione attuale e a tutte le versioni.    #
'# future                                                                                 #
'#                                                                                        #
'# Il software viene distribuito con lo scopo di essere utile e di aiutare nella          #
'# realizzazione di un sito web, non ci assiumiamo nessuna responsabilità per             #
'# eventuali malfunzionamenti o problemi provenienti dal programma.                       #
'#                                                                                        #
'# E' assolutamente vietato eliminare ogni riferimento di copyright sia all'interno del   #
'# del codice sorgente sia quelli visivi nel progetto.                                    #
'#                                                                                        #
'# Una copia della licenza GNU GPL è rilasciata nel pacchetto di istallazione del         #
'# software.                                                                              #
'#                                                                                        #
'# Per supporto visita il nostro sito ufficiale                                           #
'# http://www.openasp.it                                                                  #
'#                                                                                        #
'#                                                                                        #
'******************************************************************************************
'
'--------------------------------------------------------------------------------------------

i = split(request.ServerVariables("HTTP_URL"), "/")
if strComp("hello.asp", i(Ubound(i)), 1) = 0 then
  response.redirect request.servervariables("HTTP_REFERER")
end if
Function isBlogMod(id, categ)
		if id <> "" and categ <> "" then
			if isNumeric(user) and isNumeric(cat) then
				set testRS = addConn.Execute("SELECT * FROM tb_blog_moderazione WHERE utente = " & id & " AND idcategoria = " & categ)
				if not testRS.EOF then
					isBlogMod = true
				else
					isBlogMod = false
				end if
			else
				isBlogMod = false
			end if
		else
			isBlogMod = false
		end if
	End Function
idblog = 1
id_post = request.QueryString("id")
if id_post = "" then
	response.Redirect("admin.asp?modulo=blog")
else
	set postRS = addConn.execute("SELECT * FROM tb_blog_posts WHERE id_post = " & testSQLinj(id_post))
	if postRS.EOF then
		response.Redirect("admin.asp?modulo=blog")
	else
		if not session("livelloUser") = 2 and not isAdm(session("uID"), "blog") and not isBlogMod(session("uID"),postRS("categoria")) then
			response.Redirect("admin.asp?modulo=blog")
		end if
	end if
end if
%>
<script type="text/javascript">
$j(document).ready(function(){
$j("#ris").hide();
$j("#tog").click(function () {
  $j("#ris").slideToggle("slow");
});

$j("#invia").click(function () {
	if($j("#titolo").val() == "" || tinyMCE.getContent().replace(/\+/g,"&#43") == ""){
		alert("Attenzione, dati mancanti!");
	}else{
		$j("#invfrm").submit();
	}
});

});
</script>
<div id="position">
	<a href="admin.asp" class="testo">Control Center</a> &raquo; <a href="admin.asp?modulo=blog"><%=traduci("ling_blog_14")%></a> &raquo; <a href="admin.asp?modulo=blog&amp;op=postmanage"><%=traduci("ling_blog_9")%></a> &raquo; <%=traduci("ling_blog_41")%>
</div>
<div id="page">
<form name="posta" id="invfrm" action="admin.asp?modulo=blog&amp;op=modificapost" method="post">
<%=traduci("ling_blog_58")%> <input type="text" id="titolo" name="titolo" style="width:200px;" value="<%=postRS("titolo")%>" /> &nbsp; <%=traduci("ling_blog_59")%> <select name="cat" class="selectclass">
<%
	set topRS = addConn.Execute("SELECT * FROM tb_blog_categorie")
	if not topRS.EOF then
		Do while NOT topRS.EOF
			response.Write "<option value=""" & topRS("id_categoria") & """ "
			call selected(postRS("categoria"), topRS("id_categoria"))
			response.Write ">" & topRS("nome_categoria") &  "</option>"
			topRS.moveNext
		Loop
	end if
	set topRS = Nothing									
%>
</select>
&nbsp;
<%=traduci("ling_blog_60")%> <input type="text" id="tags" name="tags" style="width:300px;" value="<%=postRS("tags")%>" />
<br />
<p style="text-align:center">
<a class="testo" href="default.asp?modulo=blog&pass=1&idpost=<%=postRS("id_post")%>" target="_blank"><%=traduci("ling_blog_83")%></a>
</p>
<br />
<textarea name="testo" class="editor" style="width:100%; height:400px;"><%=postRS("contenuto")%></textarea>
<%
Call creaComponente("editor","full")
%>
    <br />
    <a href="#" id="tog" class="testo"><%=traduci("ling_blog_61")%></a>
    <br />
  <div id="ris">
	<%=traduci("ling_blog_62")%> <br />
    <textarea name="riassunto" style="width:100%; height:100px;"><%=postRS("riassunto")%></textarea>
  </div>
<br /><br />
<%
With response
	.Write traduci("ling_blog_36") & " <select class=""inputclass"" name=""stato"">"&vbNewLine
		.Write "<option value=""1"" "
	End with
	call selected(postRS("pubblico"),"1")
	With response
		.Write ">" & traduci("ling_blog_37")& "</option>"&vbNewLine
		.Write "<option value=""0"" "
	End with
	call selected(postRS("pubblico"),"0")
	With response
		.Write ">" & traduci("ling_blog_38")& "</option>"&vbNewLine
		.Write "</select> "&vbNewLine					
End with
%>
<br /><br />
<input type="hidden" name="id_post" value="<%=id_post%>" />
</form>
<input type="button" id="invia" value="<%=traduci("ling_blog_71")%>" />
</div>